home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Softdisk Magazette Volume 2, No. 06 (1983-02)(Softdisk)(Side B).zip / Softdisk Magazette Volume 2, No. 06 (1983-02)(Softdisk)(Side B).do / NAME FAZE.bas < prev    next >
BASIC Source File  |  1996-12-24  |  380b  |  14 lines
  1. 1  HOME 
  2. 2  VTAB 9: HTAB 3: PRINT "     YOU MUST HIT 'RESET' TO": PRINT "        END THIS PROGRAM"
  3. 4  FOR X = 1 TO 4500: NEXT X
  4. 5  HOME 
  5. 10  INPUT "WHAT IS YOUR FIRST NAME? ";N$
  6. 15  HOME 
  7. 18  FOR S = 1 TO 255  STEP 5
  8. 19  SPEED= S
  9. 20  LET A =  INT(22 * RND(1) +1)
  10. 30  LET B =  INT(35 * RND(1) +1)
  11. 40  VTAB A: HTAB B: PRINT N$
  12. 50  IF M = 5  THEN 70
  13. 60  NEXT S
  14. 70  LET M = 5: GOTO 20